Google
 
Trailing-Edge - PDP-10 Archives - 6.1_emacs_manuals_1er - emacs/mkdump.:ej
There are no other files named mkdump.:ej in the archive.
PW[0 +8+fq(+4)[1
0fo10f"g+q1'
+fq()+4u1
fq1"l 0'
,q1:m(q1+4(]1]0))@M:SZ/eKmW}iu D(5/n& SetUp MKDUMP Library<ENTRY>Dump EMACSMkDump Load Library~DIRECTORY~ ~DOC~ & SetUp MKDUMP Library~DOC~ <ENTRY>~DOC~ Dump EMACS~DOC~ MkDump Load Library~DOC~ ~FILENAME~~FILENAME~

~INVERT~
MKDUMPE:g(m.mLoad Library) m.vMM Load Libraryw
 :g(m.m~DOC~ Load Library) m.vMM ~DOC~ Load Libraryw
 :g(m.mDump EMACS) m.vMM Dump EMACSw
 :g(m.m~DOC~ Dump EMACS) m.vMM ~DOC~ Dump EMACSw
 i0fo..qMKDUMP Loaded-11707937245"n
0m.CDumped EMACS Name* If non-0, is filename to dump to
0m.CDumped EMACS Default Filename* If non-0, is default filename for dumped EMACS when it starts
0m.CDumped EMACS Quick Start?* If non-0, we dump out a quick-starting EMACS
0m.CDumped EMACS Startup HookIf non-0, will be called at dump startup time
0m.CDumped EMACS fsTTYMacroContains the fsTTYMacro to restore after libraries are loaded
11707937245m.vMKDUMP Loaded'
[1[2
m.mLoad Libraryu1
m.mMkDump Load Library m.vMM Load Libraryw
f=MM Load Library1"n
q1m.vMM Pre-MkDump Load Libraryw'
"#
0fo..qMM Pre-MkDump Load Library"e
m(m.m& Get Library Pointer)EMACS(
)m.mLoad Librarym.vMM Pre-MkDump Load Libraryw''
=

f[DFile
etDSK: fsHSNamefsDSNamew
qDumped EMACS Namef"nfsDFile'
"#w fsOSTecof"ew etTS DEMACS'
"#-1"e etDEMACS.EXE'
"# etDEMACS.SAV'''w
et
qEditor Nameu.1
1,m.m& StartUp .1"e
@:i*|m.m& Recursive ^R Set Modef[^REnter

q..0u..h
0fsQPUnwindw
:m..l | m.vMM & StartUp .1w
@:i.2|
fsClkIntf"Ew 5*3600'fsClkIntw
qDumped EMACS fsTTYMacrof(fsTTYMacrow
)"n m(fsTTYMacro)'
qDumped EMACS Startup Hook"n
mDumped EMACS Startup Hook'|
((ff"'n)&("'n))(qDumped EMACS Quick Start?)"n
@ft
Creating a quick-starting EMACS, no JCL.
@:i*|.2
etDSK: fsMSNamefsDSNamew !<! etFOO >
0fo..qDumped EMACS Default Filenamef"nfsDFilew'
q..hu..0
fs^RExit |m.v*Initialization*w'
"#
       @ft
Creating a default-init EMACS.
@:i*|.2
etDSK:EMACS;
fsOSTeco"e er* EMACS'"# erEMACS.INIT' @y
:i*[..9
m(hfx*)
q..hu..0
fs^RExit |m.v*Initialization*w''
1,m(m.m& Get Library Pointer)PURIFY"e
m(m.mKill Variable)PURIFY Library Filenamew'
0fsTTYMacrouDumped EMACS fsTTYMacro
0fs^RArgPw
0u..H
0fo..qCache Enabled"N 1:<m(m.mPurge Cache)>w'
0u0 < q0*5-fq.b; q:.b(q0+4)[..O 1f? ]..O q:.b(q0)+q0u0 >
q.b[..O 1f? ]..O
q..q[..O 1f? ]..O
q..L( q..P(
fs:EJPage(
1,m.mDump Environment"E
f[DFile :ejDSK:EMACS;PURIFY :EJw f]DFile '
m(m.mDump Environment)
)fs:EJPagew
)u..P )u..L
qDumped EMACS fsTTYMacro fsTTYMacrow
0u*Initialization*
fsDFile u.1
@ft
Dumped .1
fsOSTeco"E fsDFn2:f6'"# fsDFn1'u.1
f~.1DEMACS"E @ft
Note: that is DEMACS, not MYEMACS'
0fsEchoActivew
-1fs^RLastw
0u.1 0u.2 0u.3
0)1,(f):m(m.mPre-MkDump Load Library)JDumped EMACS environments made easy.
Bugs/features to JPERSHING@BBNA.\C Comes first in an init file.
The only preparation necessary to use MKDUMP is to insert the
following line into your init file, at the top before any library
loading (note that there are TWO Altmodes at the end of the line):

MM Run LibraryMKDUMP

Or if you have an EVARS file, insert this line into it, at the top:

*: MM Run LibraryMKDUMP

This will prepare EMACS for later dumping by causing M-X Load
Library to start remembering exactly where it finds the libraries
it loads.

To make a dumped EMACS job, first start up EMACS the normal way:

	:EMACS<cr>				(on ITS)
	EMACS<cr>				(on Tenex or Tops-20)

Then type:

	M-X Dump EMACS<cr>

This will write the dump to the file TS DEMACS (on ITS), DEMACS.EXE
(on Tops-20), or DEMACS.SAV (on Tenex) in your home directory.

The next time you want to run EMACS, you can run the dump:

	:DEMACS<cr>				(on ITS)
	DEMACS<cr>				(on Tenex or Tops-20)

For more detailed information, see the INFO node.<S Install our little hook (hack?).
Hack Load Library so that it always maintains the
filename variables required for dumping.
This object file was compressed on 12:40am  Friday, 27 February 1981
by JPERSHING on BBNA from the following source libraries:

   PS:<JPERSHING>MKDUMP.IVORY.51,	02/27/81 00:40:04WC Dump this EMACS out to file given by string argument.

Default is home directory, TS DEMACS on ITS, DEMACS.EXE on TWENEX,
DEMACS.SAV on TENEX.  The dump, when started, will call the default
init-file (e.g. to do JCL processing) unless this command is invoked
with a numeric argument.  For more information, see the documentation
for & Setup MKDUMP Library, or the INFO node.

Should probably only be called from top-level -mode, as it is
somewhat sensitive to what has been pushed onto the PDL.

This clobbers q-registers .1, .2, and .3 for necessary reasons -- do
not push them.VC Load a library of functions.
Takes filename as string arg;  default FN2 is :EJ.
Tries both the specified (or home) directory and EMACS.
An argument means don't run the library's & Setup function.
Creates a variable with the library's real filename, so this EMACS may
    later be dumped out.
Returns a pointer to the file in core.F<ENTRY>
& SetUp MKDUMP Library
Dump EMACS
MkDump Load Library
\+8+fq(+4)[2 0[3
< %3,-q2f2u3 q3&1@; q3"l 0' >
f[BBind q3-1*5,q3*5g2 q:..o(0)+q2